home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / vbcc / machines / amiga68k / libsrc / AmigaLib / CallHook.s < prev    next >
Encoding:
Text File  |  1998-06-24  |  351 b   |  25 lines
  1.     section "CODE",code
  2.     cnop    0,4
  3.     xdef    _CallHook
  4.     xdef    _CallHookA
  5.  
  6. _CallHook
  7.     lea     12(a7),a1
  8.     bra     L_CallHook
  9.  
  10. _CallHookA
  11.     move.l  12(a7),a1
  12.  
  13. L_CallHook
  14.     movem.l a2/a6,-(a7)
  15.     move.l  12(a7),a0
  16.     move.l  16(a7),a2
  17.     bsr     L_callit
  18.     movem.l (a7)+,a2/a6
  19.     rts
  20.  
  21. L_callit
  22.     move.l  8(a0),-(a7)
  23.     rts
  24.  
  25.